home *** CD-ROM | disk | FTP | other *** search
/ Ah My Goddess / Ah My Goddess.iso / pc / stage / start.dxr / 00001.ls next >
Encoding:
Text File  |  1997-09-08  |  1.6 KB  |  40 lines
  1. on startMovie
  2.   global mux, muy, mubx, muby, pbx, pby, glpbkaku, gvypmax, gvr, gvhensa, lgmux, lgmuy, lgmubx, lgmuby, lgpbx, lgpby, gvborc, gvwborc, lgglpbkaku, lggvypmax, lggvr, lggvhensa, glchar, glverdhandi, glurdhr, glskuld, glother, glall, gvcharpoint, gva, gvkaitenf, gvpictmax, glpictlist, gvpictdan, gvdownringf, gvspinlrf, gvpbkaku, gvwl2, gvpictnum, glverdhandix, glurdhrx, glskuldx, glotherx, glpictlistx, glverdhandiy, glurdhry, glskuldy, glothery, glpictlisty, glhatsude, gvsoundfade, gvsoundlevel, gvslevellist, gvorgsoundlevel, gvw0, gvchargaetime, gvstagefix, gvmovwait, gvmemsize
  3.   clearGlobals()
  4.   set the idleReadChunkSize to 760 * 1024
  5.   dontPassEvent()
  6.   gfxoyakusoku()
  7.   set gvmemsize to 8500000
  8.   gfxkyeset()
  9.   set gvmovwait to 7
  10.   set gvstagefix to 0
  11.   set gvw0 to 0
  12.   set gvborc to 0
  13.   set gvwborc to 0
  14.   set gvpictnum to 2
  15.   set gvhensa to 40 * PI / 180
  16.   set gvpbkaku to 0.0
  17.   set gvdownringf to 0
  18.   set gvspinlrf to 0
  19.   set gvkaitenf to 0
  20.   set lgglpbx to []
  21.   set lgglpby to []
  22.   set lgglpbkaku to []
  23.   set lggvypmax to 0
  24.   set lggvr to 430
  25.   set lggvhensa to 40 * PI / 180
  26.   repeat with lvi = 1 to 32
  27.     add(lgglpbkaku, gfxtorimat(2.0 * PI / 32.0 * (lvi - 1.0)))
  28.   end repeat
  29.   set gvchargaetime to 0
  30.   gfxhatsudeset()
  31.   gfxcastset()
  32.   gfxcastrangeset()
  33.   set gva to rect(20, 60, 200, 300)
  34.   set gvslevellist to [0, 32, 64, 96, 128, 160, 192, 224, 255]
  35.   set gvsoundlevel to 5
  36.   set gvsoundfade to getAt(gvslevellist, gvsoundlevel)
  37.   set the volume of sound 1 to getAt(gvslevellist, gvsoundlevel)
  38.   set the volume of sound 2 to getAt(gvslevellist, gvsoundlevel)
  39. end
  40.